object MMsgDlg: TMMsgDlg Left = 255 Top = 155 Width = 382 Height = 264 Caption = 'Message dialogs' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] FormStyle = fsMDIChild Position = poScreenCenter Visible = True OnClose = FormClose PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 4 Top = 4 Width = 361 Height = 93 Alignment = taCenter AutoSize = False Caption = 'The TMultLang component can also translate all buttons and title' + 's of standard message dialogs like ShowMessage, MessageDlg or In' + 'putQuery together with the MButtons component. The MButtons comp' + 'onent subclasses any sub dialog automatically.' Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 8 Top = 96 Width = 357 Height = 33 AutoSize = False Caption = 'Click on any of the buttons below to show a translated message d' + 'ialog (Title, OK, No, Yes buttons etc)' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object MultLang1: TMultLang Left = 320 Top = 44 Width = 37 Height = 22 AlignIcon = alLeft AlignText = alLeft IconMargin = 1 ItemHeight = 16 Items.Strings = ( 'English' 'Swedish') ShowIcons = False Text = 'English' ResizeIcon = False TextMargin = 5 DefaultLanguage = 'English' LanguageFile = '%EXEPath%Mdiapp.lan' LanguagesData = {} end object Button1: TButton Left = 100 Top = 140 Width = 145 Height = 25 Caption = 'ShowMessage' TabOrder = 1 OnClick = Button1Click end object Button2: TButton Left = 100 Top = 172 Width = 145 Height = 25 Caption = 'MessageDlg' TabOrder = 2 OnClick = Button2Click end object Button3: TButton Left = 100 Top = 204 Width = 145 Height = 25 Caption = 'InputQuery' TabOrder = 3 OnClick = Button3Click end object MButtons1: TMButtons Captions.Strings = ( 'OK|&Accept' 'Cancel|&Break' 'Yes|&Yep' 'No|&No thanks') Title = 'Window Title, usually the name of your EXE file' Left = 8 Top = 52 end end